In this text, I explore making a graph about things that happened to me at a conference. Those things include:
| label | category | scenario |
|---|---|---|
| Interesting application of data storage + ML at Lufthansa | 0.0 | 0.8 |
| Netwroking “Speed dating” | 0.1 | 0.1 |
| “Make data great again” joke | 0.0 | 0.0 |
| The phrase “Technology XXX is a revolution” | 0.0 | 0.1 |
| Debating ideas over a great dinner in Paris. | 1.0 | 1.0 |
| Meeting someone that introduces you to a book publisher | 0.0 | 1.0 |
| Using arcane language to explain obvious patterns | 1.0 | 0.3 |
| Hearing how the Financial Times uses A/B study design to increase engagment through their interface | 0.5 | 0.8 |
| Listening to Futurist/Historian James Burke talk about a future dictated by nanofactories | 0.6 | 0.7 |
First try:
scale_x <- scale_x_continuous(
name = "",
limits = c(0, 1),
breaks = 0.5,
labels = "Truly Excruciating",
sec.axis = dup_axis(labels = "Genuinely Awesome")
)
scale_y <- scale_y_continuous(
name = "",
limits = c(0, 1),
breaks = 0.5,
labels = "Industry",
sec.axis = dup_axis(labels = "Academic")
)
final_chart <- basic_plot +
geom_point(mapping = aes(x = category, y = scenario, text = label)) +
geom_vline(xintercept = 0.5) +
geom_hline(yintercept = 0.5) +
scale_y +
scale_x
## Warning: Ignoring unknown aesthetics: text
ggplotly(final_chart, tooltip = "text")